home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
scope
/
151-175
/
scopedisk168
/
asmmacros
/
puretemplate
< prev
next >
Wrap
Text File
|
1995-03-19
|
954b
|
38 lines
INCLUDE "AsMac:CoreMacros.i"
INCLUDE "AsMac:AllocUDS.i"
INCLUDE "AsMac:FreeUDS.i"
DefineSections [<ProgramName>]
ProgStart:
AllocUDS UDS_Size ; Allocate memory for uninitialized data
BEQ AllocUDSFail ; storage.
::::::::::::::::::::::::::::::::::::::::::::
::::::::::::::::::::::::::::::::::::::::::::
::: :::
::: MAIN PART OF THE PROGRAM GOES HERE :::
::: :::
::::::::::::::::::::::::::::::::::::::::::::
::::::::::::::::::::::::::::::::::::::::::::
FreeUDS UDS_Size ; De-allocate the UDS memory.
CLR.L D0 ; Exit the program with return code of zero.
RTS
AllocUDSFail:
MOVE.L #100,D0 ; Exit the program with return code indicating
RTS ; that AllocUDS failed.
UDS_Size EQU DefDSPointer
END